(doprnt1): Get byte length of Lisp string correctly.

diff --git a/src/doprnt.c b/src/doprnt.c
index 7bcb6741677821faadd51965b1802bd502342409..3fd6222c9d7ce89979e8bd02295b8e5afd40cde4 100644 (file)
--- a/src/doprnt.c
+++ b/src/doprnt.c
@@ -240,7 +240,7 @@ doprnt1 (lispstrings, buffer, bufsize, format, format_end, nargs, args)
              if (lispstrings)
                {
                  string = ((struct Lisp_String *)args[cnt])->data;
-                 tem = ((struct Lisp_String *)args[cnt])->size;
+                 tem = STRING_BYTES ((struct Lisp_String *)args[cnt]);
                  cnt++;
                }
              else